home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 7 / Apprentice-Release7.iso / Environments / PowerLisp 2.01 / PowerLisp 2.01 ƒ / Library / compile-ppc-libs.lisp < prev    next >
Encoding:
Text File  |  1996-05-22  |  2.1 KB  |  130 lines  |  [TEXT/ROSA]
  1. ;;;
  2. ;;;        PowerLisp 2.0
  3. ;;;        Copyright © 1996 Roger Corman.  All rights reserved.
  4. ;;;        PowerPC library compiler script.
  5. ;;;
  6. ;;
  7. ;;    This file compiles all the standard libraries
  8. ;;
  9.  
  10. ;; if assembler not loaded, load the correct one
  11. (if (not (member :assembler *modules*))
  12.     (if cl::%powerpc-native
  13.         (load ":library:assembler_ppc.lisp")
  14.         (load ":library:assembler_68k.lisp")))
  15.  
  16. ;; if compiler not loaded, load the correct one
  17. (if (not (member :compiler *modules*))
  18.     (if cl::%powerpc-native
  19.         (load ":library:compiler_ppc.lisp")
  20.         (load ":library:compiler_68k.lisp")))
  21.  
  22. (compile-file 
  23.     ":library:assembler_ppc.lisp" 
  24.     :output-file ":library:assembler.ppcl"
  25.     :print t)
  26.  
  27. (load ":library:assembler.ppcl")
  28.  
  29. (compile-file 
  30.     ":library:compiler_ppc.lisp" 
  31.     :output-file ":library:compiler.ppcl"
  32.     :print t)
  33.  
  34. (load ":library:compiler.ppcl")
  35.  
  36. (compile-file 
  37.     ":library:cl.lisp" 
  38.     :output-file ":library:cl.ppcl"
  39.     :print t)
  40.  
  41. (load ":library:cl.ppcl")
  42.  
  43. (compile-file 
  44.     ":library:backquote.lisp" 
  45.     :output-file ":library:backquote.ppcl"
  46.     :print t)
  47.  
  48. (load ":library:backquote.ppcl")
  49.  
  50. (compile-file 
  51.     ":library:setf.lisp" 
  52.     :output-file ":library:setf.ppcl"
  53.     :print t)
  54.  
  55. (load ":library:setf.ppcl")
  56.  
  57. (compile-file 
  58.     ":library:defpackage.lisp" 
  59.     :output-file ":library:defpackage.ppcl"
  60.     :print t)
  61.  
  62. (compile-file 
  63.     ":library:structures.lisp" 
  64.     :output-file ":library:structures.ppcl"
  65.     :print t)
  66.  
  67. (compile-file 
  68.     ":library:format.lisp" 
  69.     :output-file ":library:format.ppcl"
  70.     :print t)
  71.  
  72. (load ":library:random.lisp")
  73. (compile-file 
  74.     ":library:random.lisp" 
  75.     :output-file ":library:random.ppcl"
  76.     :print t)
  77.  
  78. (compile-file 
  79.     ":library:describe.lisp" 
  80.     :output-file ":library:describe.ppcl"
  81.     :print t)
  82.  
  83. (compile-file 
  84.     ":library:documentation.lisp" 
  85.     :output-file ":library:documentation.ppcl"
  86.     :print t)
  87.  
  88. (load ":library:clos.lisp")
  89.  
  90. (compile-file 
  91.     ":library:clos.lisp" 
  92.     :output-file ":library:clos.ppcl"
  93.     :print t)
  94.  
  95. (load ":library:loop.lisp")
  96.  
  97. (compile-file 
  98.     ":library:loop.lisp" 
  99.     :output-file ":library:loop.ppcl"
  100.     :print t)
  101.  
  102. (compile-file 
  103.     ":library:graphics.lisp" 
  104.     :output-file ":library:graphics.ppcl"
  105.     :print t)
  106.  
  107.  
  108.  
  109.  
  110.  
  111.  
  112.  
  113.  
  114.  
  115.  
  116.  
  117.  
  118.  
  119.  
  120.  
  121.  
  122.  
  123.  
  124.  
  125.  
  126.  
  127.  
  128.  
  129.  
  130.